home *** CD-ROM | disk | FTP | other *** search
/ Apple II Magazines (PO) / Nibble Volume 09, No. 12 (1988-12)(MicroSPARC)(Side A).zip / Nibble Volume 09, No. 12 (1988-12)(MicroSPARC)(Side A).po / TEXT.SHIFTER.FP.bas < prev    next >
BASIC Source File  |  1996-12-24  |  266b  |  4 lines
  1. 1  IF  PEEK( -1101) < >6  THEN  FOR I = 768 TO 815: READ J: POKE I,J: NEXT : CALL 768
  2. 2  DATA 165,103,133,0,165,104,133,1,160,1,177,0,240,33,160,4
  3. 3  DATA 177,0,240,13,48,8,201,96,144,4,41,95,145,0,200,208
  4. 4  DATA 239,160,0,177,0,170,200,177,0,133,1,134,0,208,223,96